object WorkEdit: TWorkEdit
  Left = 639
  Top = 120
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsDialog
  Caption = 'WorkEdit'
  ClientHeight = 285
  ClientWidth = 162
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCloseQuery = FormCloseQuery
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 96
    Width = 79
    Height = 13
    Caption = #1055#1088#1077#1087#1086#1076#1072#1074#1072#1090#1077#1083#1100
  end
  object Label2: TLabel
    Left = 8
    Top = 144
    Width = 38
    Height = 13
    Caption = #1054#1094#1077#1085#1082#1072
  end
  object Label3: TLabel
    Left = 8
    Top = 48
    Width = 90
    Height = 13
    Caption = #1053#1072#1079#1074#1072#1085#1080#1077' '#1088#1072#1073#1086#1090#1099
  end
  object Label4: TLabel
    Left = 8
    Top = 192
    Width = 121
    Height = 13
    Caption = #1042#1099#1076#1072#1085#1072' '#1087#1088#1077#1087#1086#1076#1072#1074#1072#1090#1077#1083#1102
    FocusControl = DBEdit1
  end
  object Label5: TLabel
    Left = 8
    Top = 240
    Width = 64
    Height = 13
    Caption = #1042#1086#1079#1074#1088#1072#1097#1077#1085#1072
    FocusControl = DBEdit2
  end
  object cbMark: TDBComboBox
    Left = 8
    Top = 160
    Width = 145
    Height = 21
    Style = csDropDownList
    DataField = 'Mark'
    DataSource = dm.dsWorks
    ItemHeight = 13
    Items.Strings = (
      #1047#1072#1095#1105#1090
      '2'
      '3'
      '4'
      '5')
    TabOrder = 0
  end
  object cbTeachers: TDBLookupComboBox
    Left = 8
    Top = 112
    Width = 145
    Height = 21
    DataField = 'Teacher_Name'
    DataSource = dm.dsWorks
    KeyField = 'Teacher_Name'
    ListField = 'Teacher_Name'
    ListSource = dm.dsTeachers
    TabOrder = 1
  end
  object cbWorkName: TDBComboBox
    Left = 8
    Top = 64
    Width = 145
    Height = 21
    Style = csDropDownList
    DataField = 'Work_Name'
    DataSource = dm.dsWorks
    ItemHeight = 13
    Items.Strings = (
      #1053#1077#1087#1088#1086#1074#1077#1088#1077#1085#1085#1072#1103' '
      #1042#1089#1090#1091#1087#1080#1090#1077#1083#1100#1085#1072#1103
      '1-'#1103
      '2-'#1103
      '3-'#1103
      '4-'#1103
      '5-'#1103
      '6-'#1103
      '7-'#1103
      '8-'#1103
      #1057#1077#1084#1077#1089#1090#1088#1086#1074#1072#1103
      #1069#1082#1079#1072#1084#1077#1085#1072#1094#1080#1086#1085#1085#1072#1103
      #1044#1086#1084#1072#1096#1085#1077#1077' '#1095#1090#1077#1085#1080#1077' 1'
      #1044#1086#1084#1072#1096#1085#1077#1077' '#1095#1090#1077#1085#1080#1077' 2'
      #1044#1086#1084#1072#1096#1085#1077#1077' '#1095#1090#1077#1085#1080#1077' 3'
      #1044#1086#1084#1072#1096#1085#1077#1077' '#1095#1090#1077#1085#1080#1077' 4'
      #1044#1086#1084#1072#1096#1085#1103#1103' '#1090#1077#1090#1088#1072#1076#1100' 1'
      #1044#1086#1084#1072#1096#1085#1103#1103' '#1090#1077#1090#1088#1072#1076#1100' 2'
      #1044#1086#1084#1072#1096#1085#1103#1103' '#1090#1077#1090#1088#1072#1076#1100' 3'
      #1044#1086#1084#1072#1096#1085#1103#1103' '#1090#1077#1090#1088#1072#1076#1100' 4'
      #1044#1086#1084#1072#1096#1085#1103#1103' '#1090#1077#1090#1088#1072#1076#1100' 5'
      #1044#1086#1084#1072#1096#1085#1103#1103' '#1090#1077#1090#1088#1072#1076#1100' 6'
      #1044#1086#1084#1072#1096#1085#1103#1103' '#1090#1077#1090#1088#1072#1076#1100' 7'
      #1044#1086#1084#1072#1096#1085#1103#1103' '#1090#1077#1090#1088#1072#1076#1100' 8')
    TabOrder = 2
  end
  object DBEdit1: TDBEdit
    Left = 8
    Top = 208
    Width = 145
    Height = 21
    DataField = 'teacher_date'
    DataSource = dm.dsWorks
    TabOrder = 3
  end
  object DBEdit2: TDBEdit
    Left = 8
    Top = 256
    Width = 145
    Height = 21
    DataField = 'return_date'
    DataSource = dm.dsWorks
    TabOrder = 4
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 162
    Height = 40
    AutoSize = True
    ButtonHeight = 38
    ButtonWidth = 39
    Caption = 'ToolBar1'
    Flat = True
    Images = MainForm.ImageListEn
    TabOrder = 5
    object btPost: TToolButton
      Left = 0
      Top = 0
      Action = actPost
    end
    object btCancel: TToolButton
      Left = 39
      Top = 0
      Action = actCancel
    end
    object ToolButton3: TToolButton
      Left = 78
      Top = 0
      Width = 8
      Caption = 'ToolButton3'
      ImageIndex = 2
      Style = tbsSeparator
    end
    object ToolButton4: TToolButton
      Left = 86
      Top = 0
      Action = actLeave
    end
  end
  object ActionList1: TActionList
    OnUpdate = ActionList1Update
    Left = 128
    Top = 8
    object actPost: TAction
      Caption = #1057#1086#1093#1088#1072#1085#1080#1090#1100
      Hint = #1057#1086#1093#1088#1072#1085#1080#1090#1100' '#1089#1076#1077#1083#1072#1085#1085#1099#1077' '#1080#1079#1084#1077#1085#1077#1085#1080#1103
      ImageIndex = 5
      ShortCut = 16467
      OnExecute = actPostExecute
    end
    object actCancel: TAction
      Caption = #1054#1090#1084#1077#1085#1072
      Hint = #1054#1090#1084#1077#1085#1080#1090#1100' '#1089#1076#1077#1083#1072#1085#1085#1099#1077' '#1080#1079#1084#1077#1085#1077#1085#1080#1103
      ImageIndex = 7
      ShortCut = 16452
      OnExecute = actCancelExecute
    end
    object actLeave: TAction
      Caption = #1042#1077#1088#1085#1091#1090#1100#1089#1103' '#1085#1072' '#1075#1083#1072#1074#1085#1091#1102
      Hint = #1042#1077#1088#1085#1091#1090#1100#1089#1103' '#1085#1072' '#1075#1083#1072#1074#1085#1091#1102
      ImageIndex = 15
      OnExecute = actLeaveExecute
    end
  end
end
